WPS 基础接口 > 表格 API 参考 > Chart > Chart 对象

代表工作簿中的图表。

说明

此图表既可以是嵌入的图表(包含在 ChartObject 对象中),也可以是单独的图表工作表。

示例部分中描述了以下用于返回 Chart 对象的属性和方法:

示例

Charts 集合包含工作簿中每个图表工作表的 Chart 对象。使用 Charts( index) 可以返回单个 Chart 对象,其中 index 为图表工作表的索引号或名称。图表索引号表示图表工作表在工作簿标签栏上的位置。Charts(1) 是工作簿中第一个(最左边的)图表;Charts(Charts.Count) 是最后一个(最右边的)图表。所有图表工作表均包括在索引计数中,即便是隐藏工作表也是如此。图表工作表名称显示在图表工作簿标签上。您可以使用 Name 属性设置或返回图表名称。本示例将更改第一张图表工作表中第一个系列的颜色。

示例代码
Charts.Item(1).SeriesCollection(1).Format.Fill.ForeColor.RGB = rgbRed

本示例将名为“Sales”的图表移至活动工作簿的尾部。

示例代码
Charts.Item("Sales").Move(null,Sheets.Item(Sheets.Count))

Chart 对象也是 Sheets 集合的成员,此集合包含工作簿中的所有工作表(图表工作表和工作表)。使用 Sheets(index) 可以返回单个工作表,其中 index 是工作表索引号或名称。

当图表是活动对象时,您可以使用 ActiveChart 属性引用它。如果用户选择了图表工作表,或者用 Chart 对象的 Activate 方法或 ChartObject 对象的 Activate 方法激活了它,则该图表工作表处于活动状态。本示例将激活图表工作表 1,然后设置图表类型和名称。

示例代码
Charts.Item(1).Activate()
let chart = ActiveChart
    chart.Type = xlLine
    chart.HasTitle = true
    chart.ChartTitle.Text = "January Sales"

如果用户选择了嵌入图表,或者用 Activate 方法激活了包含该嵌入图表的 ChartObject 对象,则该嵌入图表处于活动状态。本示例将激活工作表 1 上的嵌入图表 1,然后设置图表类型和名称。请注意,在激活了嵌入图表之后,本示例中的代码与前一个示例中的代码相同。通过使用 ActiveChart 属性,您可以编写能够引用嵌入图表或图表工作表(视哪一个处于活动状态而定)的 Visual Basic 代码。

示例代码
Worksheets.Item(1).ChartObjects(1).Activate()
ActiveChart.ChartType = xlLine
ActiveChart.HasTitle = true
ActiveChart.ChartTitle.Text = "January Sales"

当图表工作表为活动工作表时,可以使用 ActiveSheet 属性来引用它。本示例使用 Activate 方法激活名为 Chart1 的图表工作表,然后将图表中系列 1 的内部颜色设置为蓝色。

示例代码
Charts.Item("chart1").Activate()
ActiveSheet.SeriesCollection(1).Format.Fill.ForeColor.RGB = rgbBlue


请参阅